Option Explicit
'ThisWorkbookҲ
Private Sub Workbook_AddinInstall()
    MsgBox Me.Name & "QOWqF"
End Sub
